--[[ 编码: JX-12-10 名称: 状态回报 作者: 日期:2025-1-29 函数: StatusReturn 功能: 更改记录: --]] jx_base= require( "jx_base" ) jx_api = require ( "jx_external_api") function StatusReturn( strLuaDEID ) local nRet, strRetInfo,strRetInfop,strRetInfocode local jx_task = {} local jx_date = {} local model nRet, jx_date = m3.GetSysCurEditDataObj( strLuaDEID, "Task_Action" ) if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "获取【巨星任务】对象属性失败!"..jx_task ) end if ( jx_date.data == '' ) then return end local success, jx_task = pcall(json.decode, jx_date.data) if (success == false) then lua.Error(strLuaDEID, debug.getinfo(1), "返回值为非法的JSON格式!" .. jx_task) end lua.Debug(strLuaDEID, debug.getinfo(1), "jx_task", jx_task) -- model, 异动回报,O:出库,I:入库,M:站台搬运 if (jx_task.task_type == "巨星出库") then model = "O" elseif (jx_task.task_type == "站台搬运") then model = "M" else model = "I" end nRet, strRetInfo = jx_api.WMS_API_SetPLCJobStatus( strLuaDEID, jx_task , "9")--已下发已执行 if ( nRet == 0 ) then nRet, strRetInfo = jx_api.WMS_API_SetLocation(strLuaDEID, jx_task, model)--异动 end -- 更新出库单的完工回报属性 local curTime = os.date("%Y-%m-%d %H:%M:%S") strCondition = "S_BS_NO = '"..jx_task.sour_no.."'" local strSetAttr if ( nRet == 0 ) then strSetAttr = "N_CR_STATE = 1, S_CR_ERR = '', T_CR = '"..curTime.."'" else lua.Debug( strLuaDEID, debug.getinfo(1), "JW-WMS SetPLCJobStatus 接口错误", strRetInfo ) strSetAttr = "N_CR_STATE = 2, S_CR_ERR = 'JW-WMS SetPLCJobStatus 接口错误, 详细信息看日志!', T_CR = '"..curTime.."'" end nRet, strRetInfo = mobox.updateDataAttrByCondition( strLuaDEID, "Task_Action", strCondition, strSetAttr ) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "更新【巨星任务】完工回报信息失败!"..strRetInfo ) end end